Top 10k strings from Maverick (1985)(CCS).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
4 type=e(p,7
3 protagonist
3 fund=fund-f(bod,2
2 sum=shy+10
2 sum-stake+f(p,2
2 shy=stake-f(p,2
2 discard=j:
2 commit=f(p,2
2 c(p,d(j),2
2 c(p,d(j),1
2 advantage=((pot+shy)*.8
2 a$="A23456789
2 You're raising over the LIMIT
2 NOT ENOUGH FUNDS
2 DO YOU WANT TO SEE THE REST OF
2 -advantage+k(p,1
2 +draw,p)=nraise
1 yes=a$="y":
1 y,x;a$(value)
1 will rigorously protect the
1 value=value+(10
1 value=c(p,v,1
1 value=c(p,e,1
1 value=c(p,d(j),1
1 value,suit of pack
1 v2=c(p,j,1
1 v1=c(p,j-1
1 the pot! ENTER STAKE +AKE OAKE ONE CARD!+Y
1 the pot! ENTER STAKE "
1 the pot! ENTER STA
1 text stringS
1 t$="text string":
1 t$="YOU"+t$(2
1 t$="TOO RICH FOR ME!"
1 t$="STILL "+t$(
1 t$="SHARING!"
1 t$="PASS!":
1 t$="NO OPENER! NEXT DEAL":
1 t$="I'M OUT!":
1 t$="I'M IN!":
1 t$="I'M BEAT!"
1 t$="I'LL STAY":
1 t$="I'LL SEE YOU"
1 t$="I TAKE THE POT THEN!":
1 t$="I FOLD!":
1 t$="CHECK!"
1 t$="CALL":
1 t$="BY ME!"
1 t$="..AND ME!"
1 sum=sum-(raise-max):
1 sum=sum+(max
1 sum=shy+max:
1 sum<stake-f(p,2
1 suit=c(p,v,2
1 suit=c(p,e,2
1 suit=c(p,d(j),2
1 stake=stake+2
1 stake=f(p,2
1 stake<ante*5
1 speak string
1 skip=skip+1
1 signal draw
1 scale>k(p,1
1 scale=scale-
1 scale=a+(fcnt
1 s1=dealer:
1 s$="a$+"" TO DRAW FIRST"""
1 s$="NEW LIMIT? ":
1 s$="BY HOW MUCH? ":
1 s$="""I,LL RAISE ""+
1 s$="""I'M ""+(a$+"" UP""
1 s$="""I'LL TAKE ""+a$+"" CARD""+(""S""
1 s$="""I'LL START WITH ""+
1 s$="""I'LL STAND PAT"""
1 s$="""I'LL OPEN FOR ""+
1 s$="""HAND No.""+
1 s$="""AND ANOTHER"+s$(12
1 round=p=start
1 ratio3to2=q(d(3
1 ratio3to2-12
1 raising+20
1 raise=sum-stake+f(p,2
1 print etc.
1 pot=pot+sum
1 pot=pot+12
1 players hands
1 patstand=y:
1 patstand=p:
1 patstand=0
1 pass=pass+1
1 p=patstand
1 p(patstand)=p(patstand)+1
1 p(p)=p(p)-1
1 overlay,(3
1 odd card is odd suit or one of pair in bob-flush
1 nraise=nraise+1
1 not in hand
1 new & old speakers
1 max=limit:
1 max=fund+1
1 machine/code
1 limit=sum:
1 high values in full house
1 hdct=hdct+1
1 hdct+"": YOUR DEAL!""":
1 fund=fund-f(p,2
1 flush=e(p,12
1 fcnt=fcnt+1
1 f(j,1)>0)+(a$+"" DOWN""
1 f(j,1)<0)+(""LEVEL""
1 e(p,d2)=j:
1 draw marker
1 double=nraise-r(2
1 double=nraise-r(1
1 discards>3 set k1
1 discard(DSC*)
1 d1>1)+""!"""
1 d1=d1-(d1=1
1 d(j)=e(p,j+7
1 copyright, of MAVERICK.
1 cncy;stake-f(bod,2
1 cncy;pot;" ";
1 cncy;limit:
1 cncy;fund-f(bod,2
1 cncy;f(bod,2
1 cncy+""5000""":
1 cncy+""500""","""MODERATE:
1 cncy+""1000""","""EASY:
1 bluff marker
1 b=double*2
1 b$="a$(value)+
1 b$="WILL YOU START THE BETTING":
1 b$="WILL YOU OPEN":
1 at stake;last raise;fold: each
1 ante=ante+2
1 ante,last raise,fold
1 a=stake-f(p,2
1 a(c(win,j,1
1 a$="YOUR CARD"
1 a$="IT'S YOU"
1 a$="1")-(4000
1 `435 UPI'M `435 UP`435 DOWNI'M `435 UPI'M `435 UP+
1 ^opp/(opp+1
1 Wrong input
1 Two card buy
1 Transfer labels
1 Threes or better
1 Three or more buy
1 TYPE CLASS
1 TIME FOR SHOWDOWN
1 THE DRAW(TD*)
1 TEXT*s1,s2
1 Starting the round
1 Start of Machine Code
1 Sbr Labels
1 SHUFFLING!
1 SET LIM*IT
1 Replace FRAMES
1 Raise,call or fold
1 READY NEXT GAME*
1 QUERYEX*d(),c()
1 Priority Variables
1 Please note that unauthorised copying, hiring and lending or broadcasting of this software is strictly prohibited."
1 Pat hand against
1 Pass marker
1 One card buy
1 NOW SET LIMIT FOR RAISING
1 Menu Options
1 Load cards
1 INSUFFICIENT FUNDS:RESTART!
1 HAND*c(5,5,2),p(layer)
1 Find high card
1 FUNDS AVAILABLE
1 Evaluates and sets
1 Estimate opposition
1 Error input
1 End Main Loop
1 End 2nd round loop
1 End 1st Round loop
1 EarlyGameEnd
1 EGE;"ONE MOMENT.."
1 Draw count- threes,twos(to test validity of two card draws-ratio should be ca. 17:1)
1 DO YOU WANT THE HAND SORTED
1 Compare equal types
1 Call,fold or raise
1 Call or fold
1 CUTTING FOR DEAL
1 CHOOSE FROM THESE OPTIONS:-
1 CHARACTER; Bold/cautious,Stubborn/dubious, Honest/bluff (-/+)
1 Assign UDG Addresses.
1 Assign Subroutines
1 Announce winner(s)
1 Aces high, suits count
1 AY IN.. More raises
1 ARRAY e ORDER
1 >ratio3to2/8
1 =fund-(4500
1 ;t$;" WINS WITH THIS HAND!":
1 ;"YOU WIN THIS HAND":
1 ;"Which cards will you exchange? (e.g qh 7c As) ";
1 ;"THE POT"
1 ;"THE POT IS SHARED!"
1 ;"READY FOR NEXT HAND";:
1 ;"Press any key when ready":
1 ;"PUBLISHED BY ";"
1 ;"NO LIMITS"
1 ;"LIMIT:";
1 ;"GOOD LUCK!":
1 ;"COPYRIGHT WARNING"'''"CASES COMPUTER SIMULATIONS LTD
1 ;"AT STAKE:
1 ;"ALL RIGHTS RESERVED";
1 ;"? y/n";:
1 ;"- ";j'':
1 8,9,10) discards
1 5),6) high cards
1 3),4) value of replicates
1 3) last raise
1 2nd ROUND LOOP(R2L*)
1 212428343710102327341021242934
1 2) amount at risk
1 1st Round Comment
1 1st ROUND LOOP(R1L*)
1 12),except runs, and high values for full house
1 11) straight flush
1 1),2) replicates
1 1) amount of winnings
1 0-3=club,di,heart spade
1 0,GOTO 9995
1 -type-(type=3
1 -pass+k(p,1
1 -advantage+k(p,2
1 +draw,p)=r(1
1 +draw,p)+1
1 +(max/(f(d(n),3
1 +(discard=e(p,8
1 )=f(d(j),2
1 )=discard:
1 )=c(win,v,1
1 )=c(win,j,1
1 )=a-double-nraise/2
1 )="2124283437"
1 )="1021242934"
1 )="1010232734"
1 );" down)"'"DO YOU WANT TO STAY IN";:
1 )+"MY DEAL!""":
1 )+"+""!"""
1 (stake-f(bod,2
1 (nraise-fcnt+1
1 (max>fund-f(bod,2
1 (Set) CHARACTER*
1 (156+suit)+
1 ((stake+stake)/12
1 ((fund-f(bod,2
1 ''''"(Break Key Restarts at Any Time)"
1 "ONE","TWO","THREE":
1 "NOTHING","PAIR","2 PAIR","THREES","STRAIGHT","FLUSH","FULL HOUSE","FOURS","ST.FLUSH":
1 "MY FIRST SAY!","","","JUST A MOMENT",""
1 "ME TO START THEN!","","LET'S SEE NOW...","","UP TO ME THEN!":
1 "ME TO OPEN","","","NOBODY LIKES IT?",""
1 "MASTERMAV"
1 "LET'S SEE IF I CAN OPEN","","","","NOBODY WANT THIS ONE?"
1 "DEMONSTRATION MODE"
1 "ADAM","BEN","CALEB","DAVID","EDDIE","YOUR CARD":
1 "","O.K, DOWN TO ME","I'LL SEE WHAT I'VE GOT","",""
1 "","","NOTHING SO FAR?","",""
1 "","","","",""
1 """SEE HOW EVERYONE IS DOING""","""CHANGE THE LIMIT""","""TRY TO PEEK WINNER'S HAND""":
1 """PLAY IN `'s""","""PLAY IN $'s""","""DEMONSTRATION MODE""":
1 pair table
1 TO STAY IN.. More raises
1 Recommend No.of discards12)
1 Flush No.
1 Actual no. discards
1 9) full house
1 7) straight
1 6) threes
1 5) 2 pair
1 3) bob-straight flush
1 2) bob-flush
1 1984 G.R.Stevens.
1 1) bob-straight
1 (Press any key)"'"
1 s$="speak string"